home *** CD-ROM | disk | FTP | other *** search
/ PC Shareware 1997 February / PC Shareware 1997-02.iso / programy / pcbaby / _setup.1 / PCBaby4.exe / 0 / RCDATA / TCHILDINFO / TCHILDINFO.txt < prev   
Text File  |  1996-10-21  |  36KB  |  1,527 lines
  1. object ChildInfo: TChildInfo
  2.   Left = 177
  3.   Top = 127
  4.   BorderStyle = bsDialog
  5.   Caption = 'Child Information'
  6.   ClientHeight = 350
  7.   ClientWidth = 505
  8.   Font.Color = clWindowText
  9.   Font.Height = -13
  10.   Font.Name = 'System'
  11.   Font.Style = []
  12.   Position = poScreenCenter
  13.   OnActivate = FormActivate
  14.   OnCreate = FormCreate
  15.   PixelsPerInch = 96
  16.   TextHeight = 16
  17.   object TabbedNotebook1: TTabbedNotebook
  18.     Left = 0
  19.     Top = 0
  20.     Width = 505
  21.     Height = 350
  22.     Align = alClient
  23.     TabsPerRow = 4
  24.     TabFont.Color = clBlue
  25.     TabFont.Height = -12
  26.     TabFont.Name = 'MS Sans Serif'
  27.     TabFont.Style = []
  28.     TabOrder = 0
  29.     object TTabPage
  30.       Left = 4
  31.       Top = 27
  32.       Caption = 'Name'
  33.       object Title: TLabel
  34.         Left = 8
  35.         Top = 288
  36.         Width = 281
  37.         Height = 27
  38.         AutoSize = False
  39.         Caption = 'Child Information'
  40.         Font.Color = clBlue
  41.         Font.Height = -21
  42.         Font.Name = 'Arial'
  43.         Font.Style = []
  44.         ParentFont = False
  45.       end
  46.       object Image1: TImage
  47.         Left = 320
  48.         Top = 56
  49.         Width = 161
  50.         Height = 137
  51.         Picture.Data = {<image000.bmp>}
  52.       end
  53.       object Bevel1: TBevel
  54.         Left = 320
  55.         Top = 56
  56.         Width = 161
  57.         Height = 137
  58.       end
  59.       object GroupBox1: TGroupBox
  60.         Left = 8
  61.         Top = 8
  62.         Width = 297
  63.         Height = 129
  64.         Caption = 'Your Child'#39's Name'
  65.         Font.Color = clBlue
  66.         Font.Height = -13
  67.         Font.Name = 'Arial'
  68.         Font.Style = [fsBold]
  69.         ParentFont = False
  70.         TabOrder = 0
  71.         object Label1: TLabel
  72.           Left = 32
  73.           Top = 32
  74.           Width = 73
  75.           Height = 16
  76.           Alignment = taRightJustify
  77.           AutoSize = False
  78.           Caption = 'First Name:'
  79.         end
  80.         object Label2: TLabel
  81.           Left = 8
  82.           Top = 64
  83.           Width = 97
  84.           Height = 16
  85.           Alignment = taRightJustify
  86.           AutoSize = False
  87.           Caption = 'Middle Name:'
  88.         end
  89.         object Label3: TLabel
  90.           Left = 32
  91.           Top = 96
  92.           Width = 73
  93.           Height = 16
  94.           Alignment = taRightJustify
  95.           AutoSize = False
  96.           Caption = 'Last Name:'
  97.         end
  98.         object FirstName: TLabel
  99.           Left = 112
  100.           Top = 32
  101.           Width = 64
  102.           Height = 16
  103.           Caption = 'FirstName'
  104.         end
  105.         object MiddleDB: TDBEdit
  106.           Left = 288
  107.           Top = 56
  108.           Width = 9
  109.           Height = 24
  110.           DataField = 'MiddleName'
  111.           DataSource = ChildData
  112.           Font.Color = clBlack
  113.           Font.Height = -13
  114.           Font.Name = 'Arial'
  115.           Font.Style = [fsBold]
  116.           MaxLength = 0
  117.           ParentFont = False
  118.           TabOrder = 0
  119.           Visible = False
  120.         end
  121.         object LastDB: TDBEdit
  122.           Left = 288
  123.           Top = 88
  124.           Width = 9
  125.           Height = 24
  126.           DataField = 'LastName'
  127.           DataSource = ChildData
  128.           Font.Color = clBlack
  129.           Font.Height = -13
  130.           Font.Name = 'Arial'
  131.           Font.Style = [fsBold]
  132.           MaxLength = 0
  133.           ParentFont = False
  134.           TabOrder = 1
  135.           Visible = False
  136.         end
  137.         object MiddleName: TEdit
  138.           Left = 112
  139.           Top = 56
  140.           Width = 169
  141.           Height = 24
  142.           Font.Color = clBlack
  143.           Font.Height = -13
  144.           Font.Name = 'Arial'
  145.           Font.Style = [fsBold]
  146.           ParentFont = False
  147.           TabOrder = 2
  148.         end
  149.         object LastName: TEdit
  150.           Left = 112
  151.           Top = 88
  152.           Width = 169
  153.           Height = 24
  154.           Font.Color = clBlack
  155.           Font.Height = -13
  156.           Font.Name = 'Arial'
  157.           Font.Style = [fsBold]
  158.           ParentFont = False
  159.           TabOrder = 3
  160.         end
  161.         object FirstDB: TDBEdit
  162.           Left = 288
  163.           Top = 24
  164.           Width = 9
  165.           Height = 24
  166.           DataField = 'FirstName'
  167.           DataSource = ChildData
  168.           MaxLength = 0
  169.           TabOrder = 4
  170.           Visible = False
  171.         end
  172.       end
  173.       object GroupBox2: TGroupBox
  174.         Left = 8
  175.         Top = 144
  176.         Width = 297
  177.         Height = 113
  178.         Caption = 'Vital Statistics'
  179.         Font.Color = clBlue
  180.         Font.Height = -13
  181.         Font.Name = 'Arial'
  182.         Font.Style = [fsBold]
  183.         ParentFont = False
  184.         TabOrder = 1
  185.         object Label4: TLabel
  186.           Left = 8
  187.           Top = 40
  188.           Width = 97
  189.           Height = 16
  190.           Alignment = taRightJustify
  191.           AutoSize = False
  192.           Caption = 'Hair Color:'
  193.         end
  194.         object Label5: TLabel
  195.           Left = 32
  196.           Top = 72
  197.           Width = 73
  198.           Height = 16
  199.           Alignment = taRightJustify
  200.           AutoSize = False
  201.           Caption = 'Eye Color:'
  202.         end
  203.         object HairDB: TDBEdit
  204.           Left = 288
  205.           Top = 32
  206.           Width = 9
  207.           Height = 24
  208.           DataField = 'Hair'
  209.           DataSource = ChildData
  210.           Font.Color = clBlack
  211.           Font.Height = -13
  212.           Font.Name = 'Arial'
  213.           Font.Style = [fsBold]
  214.           MaxLength = 0
  215.           ParentFont = False
  216.           TabOrder = 0
  217.           Visible = False
  218.         end
  219.         object EyesDB: TDBEdit
  220.           Left = 288
  221.           Top = 64
  222.           Width = 9
  223.           Height = 24
  224.           DataField = 'Eyes'
  225.           DataSource = ChildData
  226.           Font.Color = clBlack
  227.           Font.Height = -13
  228.           Font.Name = 'Arial'
  229.           Font.Style = [fsBold]
  230.           MaxLength = 0
  231.           ParentFont = False
  232.           TabOrder = 1
  233.           Visible = False
  234.         end
  235.         object Hair: TEdit
  236.           Left = 112
  237.           Top = 32
  238.           Width = 169
  239.           Height = 24
  240.           Font.Color = clBlack
  241.           Font.Height = -13
  242.           Font.Name = 'Arial'
  243.           Font.Style = [fsBold]
  244.           ParentFont = False
  245.           TabOrder = 2
  246.         end
  247.         object Eyes: TEdit
  248.           Left = 112
  249.           Top = 64
  250.           Width = 169
  251.           Height = 24
  252.           Font.Color = clBlack
  253.           Font.Height = -13
  254.           Font.Name = 'Arial'
  255.           Font.Style = [fsBold]
  256.           ParentFont = False
  257.           TabOrder = 3
  258.         end
  259.       end
  260.       object HelpBtn: TBitBtn
  261.         Left = 464
  262.         Top = 240
  263.         Width = 25
  264.         Height = 27
  265.         Caption = ' '
  266.         Font.Color = clBlack
  267.         Font.Height = -11
  268.         Font.Name = 'MS Sans Serif'
  269.         Font.Style = [fsBold]
  270.         ParentFont = False
  271.         TabOrder = 2
  272.         OnClick = HelpBtnClick
  273.         Kind = bkHelp
  274.         Margin = 2
  275.         Spacing = -1
  276.       end
  277.     end
  278.     object TTabPage
  279.       Left = 4
  280.       Top = 27
  281.       Caption = 'Birth Information'
  282.       object Label6: TLabel
  283.         Left = 8
  284.         Top = 288
  285.         Width = 281
  286.         Height = 27
  287.         AutoSize = False
  288.         Caption = 'Child Information'
  289.         Font.Color = clBlue
  290.         Font.Height = -21
  291.         Font.Name = 'Arial'
  292.         Font.Style = []
  293.         ParentFont = False
  294.       end
  295.       object GroupBox4: TGroupBox
  296.         Left = 8
  297.         Top = 1
  298.         Width = 377
  299.         Height = 256
  300.         TabOrder = 0
  301.         object TLabel
  302.           Left = 32
  303.           Top = 24
  304.           Width = 56
  305.           Height = 13
  306.           Alignment = taRightJustify
  307.           Caption = 'Birthdate:'
  308.           Font.Color = clBlue
  309.           Font.Height = -11
  310.           Font.Name = 'MS Sans Serif'
  311.           Font.Style = [fsBold]
  312.           ParentFont = False
  313.         end
  314.         object TLabel
  315.           Left = 104
  316.           Top = 128
  317.           Width = 3
  318.           Height = 13
  319.         end
  320.         object Label9: TLabel
  321.           Left = 264
  322.           Top = 16
  323.           Width = 4
  324.           Height = 19
  325.           Caption = '/'
  326.           Font.Color = clBlue
  327.           Font.Height = -16
  328.           Font.Name = 'Arial'
  329.           Font.Style = [fsBold]
  330.           ParentFont = False
  331.         end
  332.         object Label10: TLabel
  333.           Left = 312
  334.           Top = 16
  335.           Width = 4
  336.           Height = 19
  337.           Caption = '/'
  338.           Font.Color = clBlue
  339.           Font.Height = -16
  340.           Font.Name = 'Arial'
  341.           Font.Style = [fsBold]
  342.           ParentFont = False
  343.         end
  344.         object TLabel
  345.           Left = 26
  346.           Top = 56
  347.           Width = 62
  348.           Height = 13
  349.           Alignment = taRightJustify
  350.           Caption = 'Birth Time:'
  351.           Font.Color = clBlue
  352.           Font.Height = -11
  353.           Font.Name = 'MS Sans Serif'
  354.           Font.Style = [fsBold]
  355.           ParentFont = False
  356.         end
  357.         object TLabel
  358.           Left = 16
  359.           Top = 88
  360.           Width = 72
  361.           Height = 13
  362.           Alignment = taRightJustify
  363.           Caption = 'Birth Height:'
  364.           Font.Color = clBlue
  365.           Font.Height = -11
  366.           Font.Name = 'MS Sans Serif'
  367.           Font.Style = [fsBold]
  368.           ParentFont = False
  369.         end
  370.         object TLabel
  371.           Left = 181
  372.           Top = 88
  373.           Width = 75
  374.           Height = 13
  375.           Alignment = taRightJustify
  376.           Caption = 'Birth Weight:'
  377.           Font.Color = clBlue
  378.           Font.Height = -11
  379.           Font.Name = 'MS Sans Serif'
  380.           Font.Style = [fsBold]
  381.           ParentFont = False
  382.         end
  383.         object TLabel
  384.           Left = 11
  385.           Top = 128
  386.           Width = 117
  387.           Height = 13
  388.           Alignment = taRightJustify
  389.           Caption = 'Attending Physician:'
  390.           Font.Color = clBlue
  391.           Font.Height = -11
  392.           Font.Name = 'MS Sans Serif'
  393.           Font.Style = [fsBold]
  394.           ParentFont = False
  395.         end
  396.         object TLabel
  397.           Left = 77
  398.           Top = 160
  399.           Width = 51
  400.           Height = 13
  401.           Alignment = taRightJustify
  402.           Caption = 'Hospital:'
  403.           Font.Color = clBlue
  404.           Font.Height = -11
  405.           Font.Name = 'MS Sans Serif'
  406.           Font.Style = [fsBold]
  407.           ParentFont = False
  408.         end
  409.         object TLabel
  410.           Left = 102
  411.           Top = 192
  412.           Width = 26
  413.           Height = 13
  414.           Alignment = taRightJustify
  415.           Caption = 'City:'
  416.           Font.Color = clBlue
  417.           Font.Height = -11
  418.           Font.Name = 'MS Sans Serif'
  419.           Font.Style = [fsBold]
  420.           ParentFont = False
  421.         end
  422.         object TLabel
  423.           Left = 301
  424.           Top = 192
  425.           Width = 35
  426.           Height = 13
  427.           Alignment = taRightJustify
  428.           Caption = 'State:'
  429.           Font.Color = clBlue
  430.           Font.Height = -11
  431.           Font.Name = 'MS Sans Serif'
  432.           Font.Style = [fsBold]
  433.           ParentFont = False
  434.         end
  435.         object TLabel
  436.           Left = 80
  437.           Top = 224
  438.           Width = 48
  439.           Height = 13
  440.           Alignment = taRightJustify
  441.           Caption = 'Country:'
  442.           Font.Color = clBlue
  443.           Font.Height = -11
  444.           Font.Name = 'MS Sans Serif'
  445.           Font.Style = [fsBold]
  446.           ParentFont = False
  447.         end
  448.         object Label11: TLabel
  449.           Left = 134
  450.           Top = 48
  451.           Width = 6
  452.           Height = 19
  453.           Caption = ':'
  454.           Font.Color = clBlue
  455.           Font.Height = -16
  456.           Font.Name = 'Arial'
  457.           Font.Style = [fsBold]
  458.           ParentFont = False
  459.         end
  460.         object TLabel
  461.           Left = 130
  462.           Top = 88
  463.           Width = 38
  464.           Height = 13
  465.           Alignment = taRightJustify
  466.           Caption = 'inches'
  467.           Font.Color = clBlue
  468.           Font.Height = -11
  469.           Font.Name = 'MS Sans Serif'
  470.           Font.Style = [fsBold]
  471.           ParentFont = False
  472.         end
  473.         object TLabel
  474.           Left = 292
  475.           Top = 87
  476.           Width = 17
  477.           Height = 13
  478.           Alignment = taRightJustify
  479.           Caption = 'lbs'
  480.           Font.Color = clBlue
  481.           Font.Height = -11
  482.           Font.Name = 'MS Sans Serif'
  483.           Font.Style = [fsBold]
  484.           ParentFont = False
  485.         end
  486.         object TLabel
  487.           Left = 354
  488.           Top = 88
  489.           Width = 14
  490.           Height = 13
  491.           Alignment = taRightJustify
  492.           Caption = 'oz'
  493.           Font.Color = clBlue
  494.           Font.Height = -11
  495.           Font.Name = 'MS Sans Serif'
  496.           Font.Style = [fsBold]
  497.           ParentFont = False
  498.         end
  499.         object BirthDay: TComboBox
  500.           Left = 96
  501.           Top = 16
  502.           Width = 113
  503.           Height = 21
  504.           Font.Color = clBlack
  505.           Font.Height = -11
  506.           Font.Name = 'MS Sans Serif'
  507.           Font.Style = []
  508.           ItemHeight = 13
  509.           Items.Strings = (
  510.             'Sunday'
  511.             'Monday'
  512.             'Tuesday'
  513.             'Wednesday'
  514.             'Thursday'
  515.             'Friday'
  516.             'Saturday'
  517.             'Sunday')
  518.           ParentFont = False
  519.           TabOrder = 0
  520.           Text = 'Monday'
  521.         end
  522.         object BDateMonth: TEdit
  523.           Left = 224
  524.           Top = 16
  525.           Width = 33
  526.           Height = 21
  527.           Font.Color = clBlack
  528.           Font.Height = -11
  529.           Font.Name = 'MS Sans Serif'
  530.           Font.Style = []
  531.           ParentFont = False
  532.           TabOrder = 1
  533.         end
  534.         object BDateDay: TEdit
  535.           Left = 272
  536.           Top = 16
  537.           Width = 33
  538.           Height = 21
  539.           Font.Color = clBlack
  540.           Font.Height = -11
  541.           Font.Name = 'MS Sans Serif'
  542.           Font.Style = []
  543.           ParentFont = False
  544.           TabOrder = 2
  545.         end
  546.         object BDateYear: TEdit
  547.           Left = 320
  548.           Top = 16
  549.           Width = 33
  550.           Height = 21
  551.           Font.Color = clBlack
  552.           Font.Height = -11
  553.           Font.Name = 'MS Sans Serif'
  554.           Font.Style = []
  555.           ParentFont = False
  556.           TabOrder = 3
  557.         end
  558.         object BTimeHr: TEdit
  559.           Left = 96
  560.           Top = 48
  561.           Width = 33
  562.           Height = 21
  563.           Font.Color = clBlack
  564.           Font.Height = -11
  565.           Font.Name = 'MS Sans Serif'
  566.           Font.Style = []
  567.           ParentFont = False
  568.           TabOrder = 4
  569.         end
  570.         object BTimeMin: TEdit
  571.           Left = 144
  572.           Top = 48
  573.           Width = 33
  574.           Height = 21
  575.           Font.Color = clBlack
  576.           Font.Height = -11
  577.           Font.Name = 'MS Sans Serif'
  578.           Font.Style = []
  579.           ParentFont = False
  580.           TabOrder = 5
  581.         end
  582.         object AmPm: TComboBox
  583.           Left = 184
  584.           Top = 48
  585.           Width = 49
  586.           Height = 21
  587.           Font.Color = clBlack
  588.           Font.Height = -11
  589.           Font.Name = 'MS Sans Serif'
  590.           Font.Style = []
  591.           ItemHeight = 13
  592.           Items.Strings = (
  593.             'a.m.'
  594.             'p.m.')
  595.           ParentFont = False
  596.           TabOrder = 6
  597.           Text = 'a.m.'
  598.         end
  599.         object Height: TEdit
  600.           Left = 96
  601.           Top = 80
  602.           Width = 33
  603.           Height = 21
  604.           Font.Color = clBlack
  605.           Font.Height = -11
  606.           Font.Name = 'MS Sans Serif'
  607.           Font.Style = []
  608.           ParentFont = False
  609.           TabOrder = 7
  610.         end
  611.         object WeightLb: TEdit
  612.           Left = 256
  613.           Top = 80
  614.           Width = 33
  615.           Height = 21
  616.           Font.Color = clBlack
  617.           Font.Height = -11
  618.           Font.Name = 'MS Sans Serif'
  619.           Font.Style = []
  620.           ParentFont = False
  621.           TabOrder = 8
  622.         end
  623.         object WeightOz: TEdit
  624.           Left = 320
  625.           Top = 80
  626.           Width = 33
  627.           Height = 21
  628.           Font.Color = clBlack
  629.           Font.Height = -11
  630.           Font.Name = 'MS Sans Serif'
  631.           Font.Style = []
  632.           ParentFont = False
  633.           TabOrder = 9
  634.         end
  635.         object Physician: TEdit
  636.           Left = 136
  637.           Top = 120
  638.           Width = 233
  639.           Height = 21
  640.           Font.Color = clBlack
  641.           Font.Height = -11
  642.           Font.Name = 'MS Sans Serif'
  643.           Font.Style = []
  644.           ParentFont = False
  645.           TabOrder = 10
  646.         end
  647.         object Hospital: TEdit
  648.           Left = 136
  649.           Top = 152
  650.           Width = 233
  651.           Height = 21
  652.           Font.Color = clBlack
  653.           Font.Height = -11
  654.           Font.Name = 'MS Sans Serif'
  655.           Font.Style = []
  656.           ParentFont = False
  657.           TabOrder = 11
  658.         end
  659.         object Country: TEdit
  660.           Left = 136
  661.           Top = 216
  662.           Width = 233
  663.           Height = 21
  664.           Font.Color = clBlack
  665.           Font.Height = -11
  666.           Font.Name = 'MS Sans Serif'
  667.           Font.Style = []
  668.           ParentFont = False
  669.           TabOrder = 12
  670.         end
  671.         object City: TEdit
  672.           Left = 136
  673.           Top = 184
  674.           Width = 153
  675.           Height = 21
  676.           Font.Color = clBlack
  677.           Font.Height = -11
  678.           Font.Name = 'MS Sans Serif'
  679.           Font.Style = []
  680.           ParentFont = False
  681.           TabOrder = 13
  682.         end
  683.         object State: TEdit
  684.           Left = 336
  685.           Top = 184
  686.           Width = 33
  687.           Height = 21
  688.           Font.Color = clBlack
  689.           Font.Height = -11
  690.           Font.Name = 'MS Sans Serif'
  691.           Font.Style = []
  692.           ParentFont = False
  693.           TabOrder = 14
  694.         end
  695.       end
  696.       object BirthdayDB: TDBEdit
  697.         Left = 392
  698.         Top = 8
  699.         Width = 25
  700.         Height = 24
  701.         DataField = 'BirthDay'
  702.         DataSource = ChildData
  703.         MaxLength = 0
  704.         TabOrder = 1
  705.         Visible = False
  706.       end
  707.       object HeightDB: TDBEdit
  708.         Left = 416
  709.         Top = 8
  710.         Width = 25
  711.         Height = 24
  712.         DataField = 'BirthHt'
  713.         DataSource = ChildData
  714.         MaxLength = 0
  715.         TabOrder = 2
  716.         Visible = False
  717.       end
  718.       object WeightLbDB: TDBEdit
  719.         Left = 440
  720.         Top = 8
  721.         Width = 25
  722.         Height = 24
  723.         DataField = 'BirthWeightLb'
  724.         DataSource = ChildData
  725.         MaxLength = 0
  726.         TabOrder = 3
  727.         Visible = False
  728.       end
  729.       object PhysicianDB: TDBEdit
  730.         Left = 464
  731.         Top = 8
  732.         Width = 25
  733.         Height = 24
  734.         DataField = 'Physician'
  735.         DataSource = ChildData
  736.         MaxLength = 0
  737.         TabOrder = 4
  738.         Visible = False
  739.       end
  740.       object HospitalDB: TDBEdit
  741.         Left = 392
  742.         Top = 32
  743.         Width = 25
  744.         Height = 24
  745.         DataField = 'Hospital'
  746.         DataSource = ChildData
  747.         MaxLength = 0
  748.         TabOrder = 5
  749.         Visible = False
  750.       end
  751.       object CityDB: TDBEdit
  752.         Left = 416
  753.         Top = 32
  754.         Width = 25
  755.         Height = 24
  756.         DataField = 'BirthCity'
  757.         DataSource = ChildData
  758.         MaxLength = 0
  759.         TabOrder = 6
  760.         Visible = False
  761.       end
  762.       object StateDB: TDBEdit
  763.         Left = 440
  764.         Top = 32
  765.         Width = 25
  766.         Height = 24
  767.         DataField = 'BirthState'
  768.         DataSource = ChildData
  769.         MaxLength = 0
  770.         TabOrder = 7
  771.         Visible = False
  772.       end
  773.       object CountryDB: TDBEdit
  774.         Left = 464
  775.         Top = 32
  776.         Width = 25
  777.         Height = 24
  778.         DataField = 'BirthCountry'
  779.         DataSource = ChildData
  780.         MaxLength = 0
  781.         TabOrder = 8
  782.         Visible = False
  783.       end
  784.       object BDayDB: TDBEdit
  785.         Left = 392
  786.         Top = 88
  787.         Width = 25
  788.         Height = 24
  789.         DataField = 'BDateDay'
  790.         DataSource = ChildData
  791.         MaxLength = 0
  792.         TabOrder = 9
  793.         Visible = False
  794.       end
  795.       object BTimeAmPmDB: TDBEdit
  796.         Left = 440
  797.         Top = 112
  798.         Width = 25
  799.         Height = 24
  800.         DataField = 'BTimeAmPm'
  801.         DataSource = ChildData
  802.         MaxLength = 0
  803.         TabOrder = 10
  804.         Visible = False
  805.       end
  806.       object BTimeMinDB: TDBEdit
  807.         Left = 416
  808.         Top = 112
  809.         Width = 25
  810.         Height = 24
  811.         DataField = 'BTimeMin'
  812.         DataSource = ChildData
  813.         MaxLength = 0
  814.         TabOrder = 11
  815.         Visible = False
  816.       end
  817.       object BTimeHrDB: TDBEdit
  818.         Left = 392
  819.         Top = 112
  820.         Width = 25
  821.         Height = 24
  822.         DataField = 'BTimeHr'
  823.         DataSource = ChildData
  824.         MaxLength = 0
  825.         TabOrder = 12
  826.         Visible = False
  827.       end
  828.       object BYearDB: TDBEdit
  829.         Left = 440
  830.         Top = 88
  831.         Width = 25
  832.         Height = 24
  833.         DataField = 'BDayYear'
  834.         DataSource = ChildData
  835.         MaxLength = 0
  836.         TabOrder = 13
  837.         Visible = False
  838.       end
  839.       object BMonthDB: TDBEdit
  840.         Left = 416
  841.         Top = 88
  842.         Width = 25
  843.         Height = 24
  844.         DataField = 'BDayMonth'
  845.         DataSource = ChildData
  846.         MaxLength = 0
  847.         TabOrder = 14
  848.         Visible = False
  849.       end
  850.       object WeightOzDB: TDBEdit
  851.         Left = 392
  852.         Top = 56
  853.         Width = 25
  854.         Height = 24
  855.         DataField = 'BirthWeightOz'
  856.         DataSource = ChildData
  857.         MaxLength = 0
  858.         TabOrder = 15
  859.         Visible = False
  860.       end
  861.       object BitBtn1: TBitBtn
  862.         Left = 464
  863.         Top = 240
  864.         Width = 25
  865.         Height = 27
  866.         Caption = ' '
  867.         Font.Color = clBlack
  868.         Font.Height = -11
  869.         Font.Name = 'MS Sans Serif'
  870.         Font.Style = [fsBold]
  871.         ParentFont = False
  872.         TabOrder = 16
  873.         OnClick = BitBtn1Click
  874.         Kind = bkHelp
  875.         Margin = 2
  876.         Spacing = -1
  877.       end
  878.     end
  879.     object TTabPage
  880.       Left = 4
  881.       Top = 27
  882.       Caption = 'First Home'
  883.       object Image2: TImage
  884.         Left = 80
  885.         Top = 152
  886.         Width = 209
  887.         Height = 113
  888.         Picture.Data = {<image001.bmp>}
  889.       end
  890.       object Bevel2: TBevel
  891.         Left = 80
  892.         Top = 152
  893.         Width = 209
  894.         Height = 113
  895.       end
  896.       object Label7: TLabel
  897.         Left = 8
  898.         Top = 288
  899.         Width = 281
  900.         Height = 27
  901.         AutoSize = False
  902.         Caption = 'Child Information'
  903.         Font.Color = clBlue
  904.         Font.Height = -21
  905.         Font.Name = 'Arial'
  906.         Font.Style = []
  907.         ParentFont = False
  908.       end
  909.       object GroupBox3: TGroupBox
  910.         Left = 8
  911.         Top = 8
  912.         Width = 409
  913.         Height = 137
  914.         Caption = 'Your Child'#39's First Home'
  915.         Font.Color = clBlue
  916.         Font.Height = -13
  917.         Font.Name = 'Arial'
  918.         Font.Style = [fsBold]
  919.         ParentFont = False
  920.         TabOrder = 0
  921.         object Label12: TLabel
  922.           Left = 32
  923.           Top = 32
  924.           Width = 54
  925.           Height = 16
  926.           Alignment = taRightJustify
  927.           Caption = 'Address:'
  928.         end
  929.         object Label13: TLabel
  930.           Left = 58
  931.           Top = 64
  932.           Width = 28
  933.           Height = 16
  934.           Alignment = taRightJustify
  935.           Caption = 'City:'
  936.         end
  937.         object Label14: TLabel
  938.           Left = 38
  939.           Top = 96
  940.           Width = 48
  941.           Height = 16
  942.           Alignment = taRightJustify
  943.           Caption = 'County:'
  944.         end
  945.         object Label15: TLabel
  946.           Left = 313
  947.           Top = 96
  948.           Width = 37
  949.           Height = 16
  950.           Alignment = taRightJustify
  951.           Caption = 'State:'
  952.         end
  953.         object Address: TEdit
  954.           Left = 96
  955.           Top = 24
  956.           Width = 289
  957.           Height = 24
  958.           Font.Color = clBlack
  959.           Font.Height = -13
  960.           Font.Name = 'Arial'
  961.           Font.Style = [fsBold]
  962.           ParentFont = False
  963.           TabOrder = 0
  964.         end
  965.         object AddCity: TEdit
  966.           Left = 96
  967.           Top = 56
  968.           Width = 289
  969.           Height = 24
  970.           Font.Color = clBlack
  971.           Font.Height = -13
  972.           Font.Name = 'Arial'
  973.           Font.Style = [fsBold]
  974.           ParentFont = False
  975.           TabOrder = 1
  976.         end
  977.         object AddCounty: TEdit
  978.           Left = 96
  979.           Top = 88
  980.           Width = 209
  981.           Height = 24
  982.           Font.Color = clBlack
  983.           Font.Height = -13
  984.           Font.Name = 'Arial'
  985.           Font.Style = [fsBold]
  986.           ParentFont = False
  987.           TabOrder = 2
  988.         end
  989.         object AddState: TEdit
  990.           Left = 352
  991.           Top = 88
  992.           Width = 33
  993.           Height = 24
  994.           Font.Color = clBlack
  995.           Font.Height = -13
  996.           Font.Name = 'Arial'
  997.           Font.Style = [fsBold]
  998.           ParentFont = False
  999.           TabOrder = 3
  1000.         end
  1001.       end
  1002.       object AddressDB: TDBEdit
  1003.         Left = 424
  1004.         Top = 32
  1005.         Width = 17
  1006.         Height = 24
  1007.         DataField = 'Address'
  1008.         DataSource = ChildData
  1009.         MaxLength = 0
  1010.         TabOrder = 1
  1011.         Visible = False
  1012.       end
  1013.       object AddCityDB: TDBEdit
  1014.         Left = 424
  1015.         Top = 64
  1016.         Width = 17
  1017.         Height = 24
  1018.         DataField = 'City'
  1019.         DataSource = ChildData
  1020.         MaxLength = 0
  1021.         TabOrder = 2
  1022.         Visible = False
  1023.       end
  1024.       object AddStateDB: TDBEdit
  1025.         Left = 424
  1026.         Top = 96
  1027.         Width = 17
  1028.         Height = 24
  1029.         DataField = 'State'
  1030.         DataSource = ChildData
  1031.         MaxLength = 0
  1032.         TabOrder = 3
  1033.         Visible = False
  1034.       end
  1035.       object AddCountyDB: TDBEdit
  1036.         Left = 456
  1037.         Top = 96
  1038.         Width = 17
  1039.         Height = 24
  1040.         DataField = 'County'
  1041.         DataSource = ChildData
  1042.         MaxLength = 0
  1043.         TabOrder = 4
  1044.         Visible = False
  1045.       end
  1046.       object BitBtn2: TBitBtn
  1047.         Left = 464
  1048.         Top = 240
  1049.         Width = 25
  1050.         Height = 27
  1051.         Caption = ' '
  1052.         Font.Color = clBlack
  1053.         Font.Height = -11
  1054.         Font.Name = 'MS Sans Serif'
  1055.         Font.Style = [fsBold]
  1056.         ParentFont = False
  1057.         TabOrder = 5
  1058.         OnClick = BitBtn2Click
  1059.         Kind = bkHelp
  1060.         Margin = 2
  1061.         Spacing = -1
  1062.       end
  1063.     end
  1064.     object TTabPage
  1065.       Left = 4
  1066.       Top = 27
  1067.       Caption = 'Headlines'
  1068.       object Label8: TLabel
  1069.         Left = 8
  1070.         Top = 288
  1071.         Width = 281
  1072.         Height = 27
  1073.         AutoSize = False
  1074.         Caption = 'Child Information'
  1075.         Font.Color = clBlue
  1076.         Font.Height = -21
  1077.         Font.Name = 'Arial'
  1078.         Font.Style = []
  1079.         ParentFont = False
  1080.       end
  1081.       object Label16: TLabel
  1082.         Left = 8
  1083.         Top = 8
  1084.         Width = 12
  1085.         Height = 24
  1086.         Caption = '1'
  1087.         Font.Color = clBlue
  1088.         Font.Height = -21
  1089.         Font.Name = 'Arial'
  1090.         Font.Style = []
  1091.         ParentFont = False
  1092.       end
  1093.       object Label17: TLabel
  1094.         Left = 8
  1095.         Top = 40
  1096.         Width = 12
  1097.         Height = 24
  1098.         Caption = '2'
  1099.         Font.Color = clBlue
  1100.         Font.Height = -21
  1101.         Font.Name = 'Arial'
  1102.         Font.Style = []
  1103.         ParentFont = False
  1104.       end
  1105.       object Label18: TLabel
  1106.         Left = 8
  1107.         Top = 72
  1108.         Width = 12
  1109.         Height = 24
  1110.         Caption = '3'
  1111.         Font.Color = clBlue
  1112.         Font.Height = -21
  1113.         Font.Name = 'Arial'
  1114.         Font.Style = []
  1115.         ParentFont = False
  1116.       end
  1117.       object Label19: TLabel
  1118.         Left = 8
  1119.         Top = 104
  1120.         Width = 12
  1121.         Height = 24
  1122.         Caption = '4'
  1123.         Font.Color = clBlue
  1124.         Font.Height = -21
  1125.         Font.Name = 'Arial'
  1126.         Font.Style = []
  1127.         ParentFont = False
  1128.       end
  1129.       object Label20: TLabel
  1130.         Left = 8
  1131.         Top = 136
  1132.         Width = 12
  1133.         Height = 24
  1134.         Caption = '5'
  1135.         Font.Color = clBlue
  1136.         Font.Height = -21
  1137.         Font.Name = 'Arial'
  1138.         Font.Style = []
  1139.         ParentFont = False
  1140.       end
  1141.       object Label21: TLabel
  1142.         Left = 8
  1143.         Top = 168
  1144.         Width = 12
  1145.         Height = 24
  1146.         Caption = '6'
  1147.         Font.Color = clBlue
  1148.         Font.Height = -21
  1149.         Font.Name = 'Arial'
  1150.         Font.Style = []
  1151.         ParentFont = False
  1152.       end
  1153.       object Label22: TLabel
  1154.         Left = 8
  1155.         Top = 200
  1156.         Width = 12
  1157.         Height = 24
  1158.         Caption = '7'
  1159.         Font.Color = clBlue
  1160.         Font.Height = -21
  1161.         Font.Name = 'Arial'
  1162.         Font.Style = []
  1163.         ParentFont = False
  1164.       end
  1165.       object H1: TEdit
  1166.         Left = 32
  1167.         Top = 8
  1168.         Width = 441
  1169.         Height = 27
  1170.         Font.Color = clBlack
  1171.         Font.Height = -16
  1172.         Font.Name = 'Arial'
  1173.         Font.Style = [fsBold]
  1174.         ParentFont = False
  1175.         TabOrder = 0
  1176.       end
  1177.       object H2: TEdit
  1178.         Left = 32
  1179.         Top = 40
  1180.         Width = 441
  1181.         Height = 27
  1182.         Font.Color = clBlack
  1183.         Font.Height = -16
  1184.         Font.Name = 'Arial'
  1185.         Font.Style = [fsBold]
  1186.         ParentFont = False
  1187.         TabOrder = 1
  1188.       end
  1189.       object H3: TEdit
  1190.         Left = 32
  1191.         Top = 72
  1192.         Width = 441
  1193.         Height = 27
  1194.         Font.Color = clBlack
  1195.         Font.Height = -16
  1196.         Font.Name = 'Arial'
  1197.         Font.Style = [fsBold]
  1198.         ParentFont = False
  1199.         TabOrder = 2
  1200.       end
  1201.       object H4: TEdit
  1202.         Left = 32
  1203.         Top = 104
  1204.         Width = 441
  1205.         Height = 27
  1206.         Font.Color = clBlack
  1207.         Font.Height = -16
  1208.         Font.Name = 'Arial'
  1209.         Font.Style = [fsBold]
  1210.         ParentFont = False
  1211.         TabOrder = 3
  1212.       end
  1213.       object H5: TEdit
  1214.         Left = 32
  1215.         Top = 136
  1216.         Width = 441
  1217.         Height = 27
  1218.         Font.Color = clBlack
  1219.         Font.Height = -16
  1220.         Font.Name = 'Arial'
  1221.         Font.Style = [fsBold]
  1222.         ParentFont = False
  1223.         TabOrder = 4
  1224.       end
  1225.       object H6: TEdit
  1226.         Left = 32
  1227.         Top = 168
  1228.         Width = 441
  1229.         Height = 27
  1230.         Font.Color = clBlack
  1231.         Font.Height = -16
  1232.         Font.Name = 'Arial'
  1233.         Font.Style = [fsBold]
  1234.         ParentFont = False
  1235.         TabOrder = 5
  1236.       end
  1237.       object H7: TEdit
  1238.         Left = 32
  1239.         Top = 200
  1240.         Width = 441
  1241.         Height = 27
  1242.         Font.Color = clBlack
  1243.         Font.Height = -16
  1244.         Font.Name = 'Arial'
  1245.         Font.Style = [fsBold]
  1246.         ParentFont = False
  1247.         TabOrder = 6
  1248.       end
  1249.       object H1DB: TDBEdit
  1250.         Left = 472
  1251.         Top = 8
  1252.         Width = 17
  1253.         Height = 24
  1254.         DataField = 'H1'
  1255.         DataSource = ChildData
  1256.         MaxLength = 0
  1257.         TabOrder = 7
  1258.         Visible = False
  1259.       end
  1260.       object H2DB: TDBEdit
  1261.         Left = 470
  1262.         Top = 40
  1263.         Width = 17
  1264.         Height = 24
  1265.         DataField = 'H2'
  1266.         DataSource = ChildData
  1267.         MaxLength = 0
  1268.         TabOrder = 8
  1269.         Visible = False
  1270.       end
  1271.       object H3DB: TDBEdit
  1272.         Left = 470
  1273.         Top = 72
  1274.         Width = 17
  1275.         Height = 24
  1276.         DataField = 'H3'
  1277.         DataSource = ChildData
  1278.         MaxLength = 0
  1279.         TabOrder = 9
  1280.         Visible = False
  1281.       end
  1282.       object H4DB: TDBEdit
  1283.         Left = 470
  1284.         Top = 104
  1285.         Width = 17
  1286.         Height = 24
  1287.         DataField = 'H4'
  1288.         DataSource = ChildData
  1289.         MaxLength = 0
  1290.         TabOrder = 10
  1291.         Visible = False
  1292.       end
  1293.       object H5DB: TDBEdit
  1294.         Left = 470
  1295.         Top = 136
  1296.         Width = 17
  1297.         Height = 24
  1298.         DataField = 'H5'
  1299.         DataSource = ChildData
  1300.         MaxLength = 0
  1301.         TabOrder = 11
  1302.         Visible = False
  1303.       end
  1304.       object H6DB: TDBEdit
  1305.         Left = 470
  1306.         Top = 168
  1307.         Width = 17
  1308.         Height = 24
  1309.         DataField = 'H6'
  1310.         DataSource = ChildData
  1311.         MaxLength = 0
  1312.         TabOrder = 12
  1313.         Visible = False
  1314.       end
  1315.       object H7DB: TDBEdit
  1316.         Left = 470
  1317.         Top = 200
  1318.         Width = 17
  1319.         Height = 24
  1320.         DataField = 'H7'
  1321.         DataSource = ChildData
  1322.         MaxLength = 0
  1323.         TabOrder = 13
  1324.         Visible = False
  1325.       end
  1326.       object BitBtn3: TBitBtn
  1327.         Left = 464
  1328.         Top = 240
  1329.         Width = 25
  1330.         Height = 27
  1331.         Caption = ' '
  1332.         Font.Color = clBlack
  1333.         Font.Height = -11
  1334.         Font.Name = 'MS Sans Serif'
  1335.         Font.Style = [fsBold]
  1336.         ParentFont = False
  1337.         TabOrder = 14
  1338.         OnClick = BitBtn3Click
  1339.         Kind = bkHelp
  1340.         Margin = 2
  1341.         Spacing = -1
  1342.       end
  1343.     end
  1344.   end
  1345.   object OKBtn: TBitBtn
  1346.     Left = 304
  1347.     Top = 314
  1348.     Width = 93
  1349.     Height = 27
  1350.     Caption = 'Ok'
  1351.     Default = True
  1352.     Font.Color = clGreen
  1353.     Font.Height = -19
  1354.     Font.Name = 'Arial'
  1355.     Font.Style = []
  1356.     ModalResult = 1
  1357.     ParentFont = False
  1358.     TabOrder = 1
  1359.     OnClick = OKBtnClick
  1360.     Glyph.Data = {
  1361.       F6000000424DF600000000000000760000002800000010000000100000000100
  1362.       04000000000080000000CE0E0000D80E00000000000000000000000000000000
  1363.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  1364.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
  1365.       5555555555555555555555555205555555555555222055555555555522205555
  1366.       5555555222220555555555222222055555555722052220555555720555522055
  1367.       5555555555522205555555555555220555555555555552205555555555555572
  1368.       0555555555555557205555555555555552205555555555555555}
  1369.     Margin = 8
  1370.     Spacing = -1
  1371.   end
  1372.   object CancelBtn: TBitBtn
  1373.     Left = 400
  1374.     Top = 314
  1375.     Width = 93
  1376.     Height = 27
  1377.     Font.Color = clRed
  1378.     Font.Height = -19
  1379.     Font.Name = 'Arial'
  1380.     Font.Style = []
  1381.     ParentFont = False
  1382.     TabOrder = 2
  1383.     OnClick = CancelBtnClick
  1384.     Kind = bkCancel
  1385.     Margin = 2
  1386.     Spacing = -1
  1387.   end
  1388.   object ChildTable: TTable
  1389.     DatabaseName = 'PCBaby4'
  1390.     TableName = 'CHILD.DB'
  1391.     Left = 224
  1392.     Top = 304
  1393.     object ChildTableFirstName: TStringField
  1394.       FieldName = 'FirstName'
  1395.       Size = 50
  1396.     end
  1397.     object ChildTableMiddleName: TStringField
  1398.       FieldName = 'MiddleName'
  1399.       Size = 50
  1400.     end
  1401.     object ChildTableLastName: TStringField
  1402.       FieldName = 'LastName'
  1403.       Size = 50
  1404.     end
  1405.     object ChildTableBDateDay: TStringField
  1406.       FieldName = 'BDateDay'
  1407.       Size = 5
  1408.     end
  1409.     object ChildTableBirthDay: TStringField
  1410.       FieldName = 'BirthDay'
  1411.       Size = 15
  1412.     end
  1413.     object ChildTableBirthHt: TStringField
  1414.       FieldName = 'BirthHt'
  1415.       Size = 4
  1416.     end
  1417.     object ChildTablePhysician: TStringField
  1418.       FieldName = 'Physician'
  1419.       Size = 50
  1420.     end
  1421.     object ChildTablePediatrician: TStringField
  1422.       FieldName = 'Pediatrician'
  1423.       Size = 50
  1424.     end
  1425.     object ChildTableHospital: TStringField
  1426.       FieldName = 'Hospital'
  1427.       Size = 50
  1428.     end
  1429.     object ChildTableBirthCity: TStringField
  1430.       FieldName = 'BirthCity'
  1431.       Size = 50
  1432.     end
  1433.     object ChildTableBirthState: TStringField
  1434.       FieldName = 'BirthState'
  1435.       Size = 2
  1436.     end
  1437.     object ChildTableBirthCountry: TStringField
  1438.       FieldName = 'BirthCountry'
  1439.       Size = 50
  1440.     end
  1441.     object ChildTableH1: TStringField
  1442.       FieldName = 'H1'
  1443.       Size = 155
  1444.     end
  1445.     object ChildTableH2: TStringField
  1446.       FieldName = 'H2'
  1447.       Size = 155
  1448.     end
  1449.     object ChildTableH3: TStringField
  1450.       FieldName = 'H3'
  1451.       Size = 155
  1452.     end
  1453.     object ChildTableH4: TStringField
  1454.       FieldName = 'H4'
  1455.       Size = 155
  1456.     end
  1457.     object ChildTableH5: TStringField
  1458.       FieldName = 'H5'
  1459.       Size = 155
  1460.     end
  1461.     object ChildTableH6: TStringField
  1462.       FieldName = 'H6'
  1463.       Size = 155
  1464.     end
  1465.     object ChildTableH7: TStringField
  1466.       FieldName = 'H7'
  1467.       Size = 155
  1468.     end
  1469.     object ChildTableHair: TStringField
  1470.       FieldName = 'Hair'
  1471.       Size = 25
  1472.     end
  1473.     object ChildTableEyes: TStringField
  1474.       FieldName = 'Eyes'
  1475.       Size = 25
  1476.     end
  1477.     object ChildTableBDayMonth: TStringField
  1478.       FieldName = 'BDayMonth'
  1479.       Size = 5
  1480.     end
  1481.     object ChildTableBDayYear: TStringField
  1482.       FieldName = 'BDayYear'
  1483.       Size = 10
  1484.     end
  1485.     object ChildTableBTimeHr: TStringField
  1486.       FieldName = 'BTimeHr'
  1487.       Size = 5
  1488.     end
  1489.     object ChildTableBTimeMin: TStringField
  1490.       FieldName = 'BTimeMin'
  1491.       Size = 5
  1492.     end
  1493.     object ChildTableBTimeAmPm: TStringField
  1494.       FieldName = 'BTimeAmPm'
  1495.       Size = 5
  1496.     end
  1497.     object ChildTableAddress: TStringField
  1498.       FieldName = 'Address'
  1499.       Size = 50
  1500.     end
  1501.     object ChildTableCity: TStringField
  1502.       FieldName = 'City'
  1503.       Size = 50
  1504.     end
  1505.     object ChildTableState: TStringField
  1506.       FieldName = 'State'
  1507.     end
  1508.     object ChildTableCounty: TStringField
  1509.       FieldName = 'County'
  1510.       Size = 50
  1511.     end
  1512.     object ChildTableBirthWeightOz: TStringField
  1513.       FieldName = 'BirthWeightOz'
  1514.       Size = 3
  1515.     end
  1516.     object ChildTableBirthWeightLb: TStringField
  1517.       FieldName = 'BirthWeightLb'
  1518.       Size = 2
  1519.     end
  1520.   end
  1521.   object ChildData: TDataSource
  1522.     DataSet = ChildTable
  1523.     Left = 256
  1524.     Top = 304
  1525.   end
  1526. end
  1527.